CODIGO SEGMENT

	ASSUME  CS:CODIGO, DS:CODIGO, ES:CODIGO 

	;MENU
	TITULO 		DB "BIENVENIDOS AL RELOJ DE BYP DE LOS WEBOS",13,10,"$"
	TITULO2 	DB "ELIJA UNA DE LAS SIGUIENTES OPCIONES",13,10,13,10,"$"

	OPCION1		DB "1. Instalar el reloj.",13,10,"$"
	OPCION2		DB "2. Desinstalar el reloj.",13,10,"$"
	OPCION3		DB "Opcion incorrecta!!!!",13,10,"$"

	CARAC DB ?
	
	INICIALIZA_CURSOR MACRO LINEA
		MOV DL,00		; COLUMNA (EMPIEZA A CONTAR EN 0)
		MOV DH,LINEA		; FILA (EMPIEZA A CONTAR EN 0)
		MOV AH,02H		; POSICIONA EL CURSOR
		INT 10H	
	ENDM
	
	ESCRIBE MACRO CADENA
		
		MOV DX,OFFSET CADENA
		MOV AH,09H
		INT 21H
	ENDM
	
INICIO:
	;INICIALIZA DS
		MOV AX,CODIGO
		MOV DS,AX
	;**************
	INICIALIZA_CURSOR 1
	ESCRIBE TITULO 
	ESCRIBE TITULO2 
OPCIONES:
	ESCRIBE OPCION1 
	ESCRIBE OPCION2 

	MOV AH,10H		;Espera por la introduccion de un caracter
	INT 16H

	CMP AL,31H		;Compara con 1
	JE INSTALA_INT		;Si es igual salta a instala_int
	JG COMPARA2		;si es mayor compara si es 2
	JL ERROR		;si es menor, la opcion es incorrecta
COMPARA2:
	CMP AL,32H		;compara con 2
	JE DESINSTALA_INT	;si es igual desinstala
	JG ERROR		;si es mayor, la opcion es incorrecta
INSTALA_INT:
	ESCRIBE OPCION1		;escribe la opcion 1
	JE ESPERA
DESINSTALA_INT:
	ESCRIBE OPCION2		;escribe la opcion 2
	JE ESPERA

ERROR:
	ESCRIBE OPCION3		;escribe el error
	JMP OPCIONES

ESPERA:	MOV AH,10H
	INT 16H
	MOV AH,4CH
	INT 21H

CODIGO ENDS
END INICIO